home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / az / cyberx.dxr / 00096_RECORRIDO + BOTON.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  620 b   |  31 lines
  1. on exitFrame
  2.   pon_cursor(1, 3)
  3.   go(the frame)
  4. end
  5.  
  6. on keyDown
  7.   if the keyCode = 124 then
  8.     puppetSprite(23, 1)
  9.     set the castNum of sprite 23 to 2103
  10.     derecha()
  11.   else
  12.     if the keyCode = 123 then
  13.       puppetSprite(22, 1)
  14.       set the castNum of sprite 22 to 2104
  15.       izquierda()
  16.     else
  17.       if the keyCode = 126 then
  18.         puppetSprite(20, 1)
  19.         set the castNum of sprite 20 to 2102
  20.         adelante()
  21.       else
  22.         if the keyCode = 125 then
  23.           puppetSprite(21, 1)
  24.           set the castNum of sprite 21 to 2101
  25.           atras()
  26.         end if
  27.       end if
  28.     end if
  29.   end if
  30. end
  31.